home *** CD-ROM | disk | FTP | other *** search
/ Popular Request / By Popular Request (Arsenal Computer)(SysOptics Distribution System).ISO / amiga1 / dlgtn121.lha / dlgul060.lha / Bonus / Ticks < prev   
Text File  |  1991-12-09  |  785b  |  18 lines
  1. ; just a little script that allows me to do simple file-announcements
  2. ; place it in your Import-Scripts AFTER the Tosser/Areafix and Updateareas
  3. ; I think SendMsg should be able to set the pointers automatically
  4. ; (I used Electric Herald before, in this case the script should be called
  5. ; between Tosser/AreaFix and UpdateAreas...)
  6.  
  7. failat 21
  8. delete t:Newticks
  9. DLG:FTick mail:Tick2.cfg
  10. if exists t:Newticks
  11. ; if there are files to announce, put the header and the footer to the list of
  12. ; files...
  13.    join DLGConfig:Text/header.ann t:Newticks DLGConfig:Text/footer.ann AS t:Tickfiles
  14. ; call SendMsg to place the Announcement in the Echo
  15.    DLG:Sendmsg -f "Marcus Kuba" -s "Neue ADS/SAN/ANSI-Files auf der IBase" -b t:TickFiles -n -r "AREA 15 All"
  16.    delete t:Newticks t:TickFiles
  17. endif
  18.